home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
TPUG - Toronto PET Users Group
/
TPUG Users Group CD
/
TPUG Users Group CD.iso
/
C64
/
S-Sound and Music
/
(c)se.d64
/
happy new year.c
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2007-02-04
|
3KB
|
100 lines
6 REM:HARRY METZ
7 REM:699 WEST 239TH STREET
8 REM:BRONX, NEW YORK 10463
10 PRINT TAB(7)"* * * ***** ***** * *"
20 PRINT TAB(7) "* * * * * * * * * *"
30 PRINT TAB(7) "***** ***** ***** ***** *****"
35 PRINT TAB(7) "* * * * * * * "
40 PRINT TAB(7) "* * * * * * * "
45 PRINT TAB(13) "* * ***** * *"
50 PRINT TAB(13) "** * * * *"
55 PRINT TAB(13) "* * * *** * * *"
60 PRINT TAB(13) "* ** * ** **"
65 PRINT TAB(13) "* * ***** * *"
70 PRINT TAB(7) "* * ***** * *****"
75 PRINT TAB(7) "* * * * * * *"
80 PRINT TAB(7) "***** *** ***** *****"
85 PRINT TAB(7) " * * * * * * "
90 PRINT TAB(7) " * ***** * * * *"
95 PRINT
100 PRINT "AULD LANG SYNE
110 L1[178]54272:L2[178]54279:L3[178]54286
120 H1[178]L1[170]1:H2[178]L2[170]1:H3[178]L3[170]1
130 V1[178]L1[170]4:V2[178]L2[170]4:V3[178]L3[170]4
140 [151] 54296,15
150 [151] V1[170]1,9:[151] V2[170]2,0
160 [151] V2[170]1,36:[151] V2[170]2,36
170 [151] V3[170]1,18:[151] V3[170]2,170
180 T[178]TI
200 [151] V1,16:[151] V2,32:[151] V3,16
210 [135] S:[139] S[178]0 [137] 290
220 [135] X1,Y1,X2,Y2,X3,Y3
230 [139] X1 [167] [151] H1,X1:[151] L1,Y1:[151] V1,17
240 [139] X2 [167] [151] H2,X2:[151] L2,Y2:[151] V2,33
250 [139] X3 [167] [151] H3,X3:[151] L3,Y3:[151] V3,17
260 T[178]T[170]S
270 [139] T[177]TI [137] 270
272 X[178][181]([187](1)[172]14)[170]1
275 [151]53281,X:[151]53280,X[170]1
280 [137] 200
290 [129]J[178]L1 [164] 54296:[151] J,0:[130] J
300 [131] 20,34,75,0,0,0,0
310 [131] 30,45,198,34,75,22,227
320 [131] 10,45,198,0,0,0,0
330 [131] 20,45,198,34,75,22,227
340 [131] 20,57,172,34,75,22,227
350 [131] 30,51,97,34,75,25,177
360 [131] 10,45,198,0,0,0,0
370 [131] 20,51,97,34,75,25,177
380 [131] 20,57,172,34,75,25,177
390 [131] 30,45,198,34,75,22,227
400 [131] 10,45,198,0,0,0,0
410 [131] 20,57,172,34,75,22,227
420 [131] 20,68,149,34,75,22,227
430 [131] 60,76,252,38,126,30,141
440 [131] 20,76,252,38,126,30,141
450 [131] 30,68,149,34,75,22,227
460 [131] 10,57,172,0,0,0,0
470 [131] 20,57,172,34,75,22,227
480 [131] 20,45,198,34,75,22,227
490 [131] 30,51,97,34,75,25,177
500 [131] 10,45,198,0,0,0,0
510 [131] 20,51,97,34,75,25,177
520 [131] 10,57,172,34,75,25,177
530 [131] 10,51,97,34,75,25,177
540 [131] 30,45,198,34,75,22,227
550 [131] 10,38,126,34,75,22,227
560 [131] 20,30,126,34,75,25,177
570 [131] 20,34,75,34,75,25,177
580 [131] 60,45,198,34,75,22,227
590 [131] 20,76,252,34,75,22,227
600 [131] 30,68,149,34,75,22,227
610 [131] 10,57,172,0,0,0,0
620 [131] 20,57,172,34,75,22,227
630 [131] 20,45,198,34,75,22,227
640 [131] 30,51,97,34,75,25,177
650 [131] 10,45,198,0,0,0,0
660 [131] 20,51,97,34,75,25,177
670 [131] 20,38,126,34,75,25,177
680 [131] 30,68,149,34,75,22,227
690 [131] 10,57,172,34,75,22,227
700 [131] 20,57,172,34,75,21,154
710 [131] 20,68,149,34,75,21,154
720 [131] 60,76,252,30,141,19,63
730 [131] 20,76,252,30,141,19,63
740 [131] 30,68,149,34,75,22,227
750 [131] 10,57,172,0,0,0,0
760 [131] 20,57,172,34,75,22,227
770 [131] 20,45,198,34,75,22,227
780 [131] 30,51,97,34,75,25,177
790 [131] 10,45,198,0,0,0,0
795 [131] 20,51,97,34,75,25,177
800 [131] 10,57,172,34,75,25,177
810 [131] 10,51,97,34,75,25,177
820 [131] 30,45,198,34,75,22,227
830 [131] 10,38,126,34,75,22,227
840 [131] 20,30,126,34,75,25,177
850 [131] 20,34,75,34,75,25,177
860 [131] 60,45,198,34,75,22,227
870 [131] 0